((Unfold `p{-}first` 0) 
\\[0ex]CollapseTHEN (Auto$\cdot$))$\cdot$